perm filename CHART.UNF[TIM,LSP] blob
sn#792907 filedate 1985-05-05 generic text, type T, neo UTF8
'(THIS IS THE UNFASL FOR ((DSK (TIM LSP)) CHART LSP))
'(ASSEMBLED BY FASLAP /392)
'(COMPILED BY LISP COMPILER /936 COMAUX /25 PHAS1 /84 MAKLAP /80 INITIA /117)
;COMPILED ON MAY 5, 1985, AT 9:34 PM
;Loading DEFSTRUCT 280
(COMMENT **FASL** 0. (LAP |STRING-LENGTH MACRO| SUBR))
(COMMENT **FASL** 25. (LAP LOOKUP SUBR))
(COMMENT **FASL** 51. (LAP GET-BENCH-INFO SUBR))
(COMMENT **FASL** 55. (LAP |RPUSH MACRO| SUBR))
(COMMENT **FASL** 93. (LAP PRINC-N SUBR))
(COMMENT **FASL** 120. (LAP ID SUBR))
'BOX
'LINE
(COMMENT **FASL** 122. (LAP FORMAT-BOX SUBR))
'ROW
'CHART
(COMMENT **FASL** 185. (LAP MAKE-A-CHART SUBR))
(COMMENT **FASL** 234. (LAP MAKE-TOP-ROW SUBR))
(COMMENT **FASL** 237. (LAP MAKE-DASHED-ROW SUBR))
(COMMENT **FASL** 263. (LAP MAKE-A-ROW SUBR))
(COMMENT **FASL** 776. (LAP ASSIGN-WIDTHS SUBR))
(COMMENT **FASL** 867. (LAP FORMAT-ALL-BOXES SUBR))
(COMMENT **FASL** 879. (LAP FIND-TOTAL-WIDTH SUBR))
(COMMENT **FASL** 897. (LAP PRINT-CHART SUBR))
(COMMENT **FASL** 911. (LAP PRINT-ROW SUBR))
(COMMENT **FASL** 932. (LAP PRINT-BOXES SUBR))
(COMMENT **FASL** 956. (LAP PRINT-LINE-N SUBR))
(COMMENT **FASL** 975. (LAP PRINT-LINE SUBR))
(COMMENT **FASL** 992. (LAP DO-CHART SUBR))
(COMMENT **** (LESSP (CAR ENTRIES) BEST) Closed compilation forced in function FIND-BEST)
(COMMENT **** (LESSP (CAR ENTRIES) BEST) Closed compilation forced in function FIND-BEST)
(COMMENT **FASL** 996. (LAP FIND-BEST SUBR))
(COMMENT **** (SAFE-QUOTIENT)
have been used but remain undefined in this file)
(COMMENT **FASL** TOTAL = 1171. WORDS)